keep if sample==1

foreach v in business_w5 comply complete open_request extension business_days_within_15 business_days_within_25 business_days_15 business_days_25 { 
	display in red "`v'"
	qui reg `v' i.treatment##i.time $ControlsB, vce(cluster agency)
		est store `v'_CB
}

#delimit ;
global Note_Table_E1 "
{\begin{minipage}{1.52\textwidth}
\small  
\vspace{0.2cm} 
\textit{Notes:} * p $math < $math 0.10, ** p $math < $math 0.05, *** p $math < $math 0.01. Standard errors clustered by agency are shown in parentheses. Control variables include: month in which the agency received the request, the total number of requests received by the agency before the intervention (Jan 1, 2017 until Sept. 5, 2018), average percentage of pending requests (not past the deadline - Mean of \% Pending Pre) before the intervention, average percentage of late requests prior to the intervention (Mean of \% Backlog Pre), type of requester, serial requesters, topic of the request, total number of requests received by the agency on the date request \$ i \$ arrived, and ministry of the agency.
 \end{minipage}
 }
";
#delimit cr

esttab business_w5_CB comply_CB complete_CB open_request_CB extension_CB business_days_within_15_CB business_days_within_25_CB business_days_15_CB business_days_25_CB using "$Tables/Table_E1.tex", replace  label  b(%5.3f) se(%5.3f) star(* 0.10 ** 0.05 *** 0.01) mlabels("Business days" "Replied in time" "Complete answer" "Open request" "Extension was granted" "Replied within 15 bd" "Replied within 25 bd" "Replied in 15 bd" "Replied in 25 bd") refcat(1.treatment   "\vspace{-6mm}", nolabel) stats(N r2,  labels(`"Observations"' `"R-squared"', prefix(\addlinespace[3pt])) fmt(%10.0fc %10.3fc 0 0) )  coeflabels($labels)  addnote($Note_Table_E1)  keep(1.treatment 1.time 1.treatment#1.time) order(1.treatment 1.time) nonumber nonote compress noomitted nobaselevels 
